namespace eval ::Taunt {
	StartTCL::Provide

	variable ::Taunt::Spells
	array set ::Taunt::Spells {
			  355 20508
			  694 20508
			 1161 20508
			 4092 20508
			 4101 20508
			 4507 20508
			 5209 20508
			 6795 20508
			 7400 20508
			 7402 20508
			 9741 20508
			20560 20508
			21008 20508
			21860 20508
			25559 20508
			23790 20508
	}
}


proc ::Taunt::OnCastTaunt { to from spellid } {
	::CastSpell $to $from $::Taunt::Spells($spellid)
}



proc ::Taunt::Init { } {
	if { [ info exists "::StartTCL::VERSION" ] } {
		::Custom::AddSpellScript "::Taunt::OnCastTaunt" [ array names ::Taunt::Spells ]
	} else {
		
	}
}

::Taunt::Init